home *** CD-ROM | disk | FTP | other *** search
/ Software Spiegel / SIB 001-94 CD.ISO / psnlffm / merlin / btxwin / install.ba_ / install.ba
Text File  |  1993-06-09  |  16KB  |  572 lines
  1. VAR
  2.     var1, var2, var3, InstPath, Info;
  3.  
  4. Begin
  5.     UTIL   (ADDBACKSLASH, WindowPath);
  6.     UTIL   (ADDBACKSLASH, SystemPath);
  7.     UTIL   (ADDBACKSLASH, SourcePath);
  8.     var1  = SourcePath + "INST.BMP";
  9.     SHOW    (LOGO, var1);
  10.     SHOW    (MESSAGE, "Willkommen bei Opalis Version 1.1");
  11.     InstPath = "C:\OPALIS";
  12.     INPUT   ("Bitte geben Sie das Zielverzeichnis ein:", InstPath);
  13.     UTIL   (ADDBACKSLASH, InstPath);
  14.  
  15.     var1  = InstPath + "CONFIG\";
  16.     var2  = "Erzeuge Verzeichnis: " + var1;
  17.     SHOW    (INFO, var2);
  18.     MAKE    (DIR, var1);
  19.  
  20.     var1  = InstPath + "PROT\";
  21.     var2  = "Erzeuge Verzeichnis: " + var1;
  22.     SHOW    (INFO, var2);
  23.     MAKE    (DIR, var1);
  24.  
  25.     var1  = InstPath + "FILM\";
  26.     var2  = "Erzeuge Verzeichnis: " + var1;
  27.     SHOW    (INFO, var2);
  28.     MAKE    (DIR, var1);
  29.  
  30.     var1  = InstPath + "MAKRO\";
  31.     var2  = "Erzeuge Verzeichnis: " + var1;
  32.     SHOW    (INFO, var2);
  33.     MAKE    (DIR, var1);
  34.  
  35.     var1  = InstPath + "SEITE\";
  36.     var2  = "Erzeuge Verzeichnis: " + var1;
  37.     SHOW    (INFO, var2);
  38.     MAKE    (DIR, var1);
  39.  
  40.     var1  = InstPath + "TELE\";
  41.     var2  = "Erzeuge Verzeichnis: " + var1;
  42.     SHOW    (INFO, var2);
  43.     MAKE    (DIR, var1);
  44.  
  45.     var1  = SourcePath + "CEPT.CO_";
  46.     var2  = InstPath + "CEPT.COV";
  47.     var3  = "Kopiere von " + var1;
  48.     var3  = var3 + " nach ";
  49.     var3  = var3 + var2;
  50.     SHOW    (INFO, var3);
  51.     COPY    (LZCOPY, var1, var2);
  52.  
  53.     var1  = SourcePath + "CEPT0610.FO_";
  54.     var2  = InstPath + "CEPT0610.FON";
  55.     var3  = "Kopiere von " + var1;
  56.     var3  = var3 + " nach ";
  57.     var3  = var3 + var2;
  58.     SHOW    (INFO, var3);
  59.     COPY    (LZCOPY, var1, var2);
  60.  
  61.     var1  = SourcePath + "CEPT0614.FO_";
  62.     var2  = InstPath + "CEPT0614.FON";
  63.     var3  = "Kopiere von " + var1;
  64.     var3  = var3 + " nach ";
  65.     var3  = var3 + var2;
  66.     SHOW    (INFO, var3);
  67.     COPY    (LZCOPY, var1, var2);
  68.  
  69.     var1  = SourcePath + "CEPT1210.FO_";
  70.     var2  = InstPath + "CEPT1210.FON";
  71.     var3  = "Kopiere von " + var1;
  72.     var3  = var3 + " nach ";
  73.     var3  = var3 + var2;
  74.     SHOW    (INFO, var3);
  75.     COPY    (LZCOPY, var1, var2);
  76.  
  77.     var1  = SourcePath + "CEPT1214.FO_";
  78.     var2  = InstPath + "CEPT1214.FON";
  79.     var3  = "Kopiere von " + var1;
  80.     var3  = var3 + " nach ";
  81.     var3  = var3 + var2;
  82.     SHOW    (INFO, var3);
  83.     COPY    (LZCOPY, var1, var2);
  84.  
  85.     var1  = SourcePath + "CEPT1220.FO_";
  86.     var2  = InstPath + "CEPT1220.FON";
  87.     var3  = "Kopiere von " + var1;
  88.     var3  = var3 + " nach ";
  89.     var3  = var3 + var2;
  90.     SHOW    (INFO, var3);
  91.     COPY    (LZCOPY, var1, var2);
  92.  
  93.     var1  = SourcePath + "CEPT1815.FO_";
  94.     var2  = InstPath + "CEPT1815.FON";
  95.     var3  = "Kopiere von " + var1;
  96.     var3  = var3 + " nach ";
  97.     var3  = var3 + var2;
  98.     SHOW    (INFO, var3);
  99.     COPY    (LZCOPY, var1, var2);
  100.  
  101.     var1  = SourcePath + "CEPT1821.FO_";
  102.     var2  = InstPath + "CEPT1821.FON";
  103.     var3  = "Kopiere von " + var1;
  104.     var3  = var3 + " nach ";
  105.     var3  = var3 + var2;
  106.     SHOW    (INFO, var3);
  107.     COPY    (LZCOPY, var1, var2);
  108.  
  109.     var1  = SourcePath + "CEPT2420.FO_";
  110.     var2  = InstPath + "CEPT2420.FON";
  111.     var3  = "Kopiere von " + var1;
  112.     var3  = var3 + " nach ";
  113.     var3  = var3 + var2;
  114.     SHOW    (INFO, var3);
  115.     COPY    (LZCOPY, var1, var2);
  116.  
  117.     var1  = SourcePath + "CEPT2428.FO_";
  118.     var2  = InstPath + "CEPT2428.FON";
  119.     var3  = "Kopiere von " + var1;
  120.     var3  = var3 + " nach ";
  121.     var3  = var3 + var2;
  122.     SHOW    (INFO, var3);
  123.     COPY    (LZCOPY, var1, var2);
  124.  
  125.     var1  = SourcePath + "DECDATA.BI_";
  126.     var2  = InstPath + "DECDATA.BIN";
  127.     var3  = "Kopiere von " + var1;
  128.     var3  = var3 + " nach ";
  129.     var3  = var3 + var2;
  130.     SHOW    (INFO, var3);
  131.     COPY    (LZCOPY, var1, var2);
  132.  
  133.     var1  = SourcePath + "OPALDEMO.EX_";
  134.     var2  = InstPath + "OPALDEMO.EXE";
  135.     var3  = "Kopiere von " + var1;
  136.     var3  = var3 + " nach ";
  137.     var3  = var3 + var2;
  138.     SHOW    (INFO, var3);
  139.     COPY    (LZCOPY, var1, var2);
  140.  
  141.     var1  = SourcePath + "MENU.ME_";
  142.     var2  = InstPath + "MENU.MEN";
  143.     var3  = "Kopiere von " + var1;
  144.     var3  = var3 + " nach ";
  145.     var3  = var3 + var2;
  146.     SHOW    (INFO, var3);
  147.     COPY    (LZCOPY, var1, var2);
  148.  
  149.     var1  = SourcePath + "OPALIS.HL_";
  150.     var2  = InstPath + "OPALIS.HLP";
  151.     var3  = "Kopiere von " + var1;
  152.     var3  = var3 + " nach ";
  153.     var3  = var3 + var2;
  154.     SHOW    (INFO, var3);
  155.     COPY    (LZCOPY, var1, var2);
  156.  
  157.     var1  = SourcePath + "ABWAHL.BM_";
  158.     var2  = InstPath + "CONFIG\";
  159.     var2  = var2 + "ABWAHL.BMP";
  160.     var3  = "Kopiere von " + var1;
  161.     var3  = var3 + " nach ";
  162.     var3  = var3 + var2;
  163.     SHOW    (INFO, var3);
  164.     COPY    (LZCOPY, var1, var2);
  165.  
  166.     var1  = SourcePath + "ANWAHL.BM_";
  167.     var2  = InstPath + "CONFIG\";
  168.     var2  = var2 + "ANWAHL.BMP";
  169.     var3  = "Kopiere von " + var1;
  170.     var3  = var3 + " nach ";
  171.     var3  = var3 + var2;
  172.     SHOW    (INFO, var3);
  173.     COPY    (LZCOPY, var1, var2);
  174.  
  175.     var1  = SourcePath + "ATTR.BM_";
  176.     var2  = InstPath + "CONFIG\";
  177.     var2  = var2 + "ATTR.BMP";
  178.     var3  = "Kopiere von " + var1;
  179.     var3  = var3 + " nach ";
  180.     var3  = var3 + var2;
  181.     SHOW    (INFO, var3);
  182.     COPY    (LZCOPY, var1, var2);
  183.  
  184.     var1  = SourcePath + "AUFD.BM_";
  185.     var2  = InstPath + "CONFIG\";
  186.     var2  = var2 + "AUFD.BMP";
  187.     var3  = "Kopiere von " + var1;
  188.     var3  = var3 + " nach ";
  189.     var3  = var3 + var2;
  190.     SHOW    (INFO, var3);
  191.     COPY    (LZCOPY, var1, var2);
  192.  
  193.     var1  = SourcePath + "DCT.BM_";
  194.     var2  = InstPath + "CONFIG\";
  195.     var2  = var2 + "DCT.BMP";
  196.     var3  = "Kopiere von " + var1;
  197.     var3  = var3 + " nach ";
  198.     var3  = var3 + var2;
  199.     SHOW    (INFO, var3);
  200.     COPY    (LZCOPY, var1, var2);
  201.  
  202.     var1  = SourcePath + "DECAUF.BM_";
  203.     var2  = InstPath + "CONFIG\";
  204.     var2  = var2 + "DECAUF.BMP";
  205.     var3  = "Kopiere von " + var1;
  206.     var3  = var3 + " nach ";
  207.     var3  = var3 + var2;
  208.     SHOW    (INFO, var3);
  209.     COPY    (LZCOPY, var1, var2);
  210.  
  211.     var1  = SourcePath + "DECBEAR.BM_";
  212.     var2  = InstPath + "CONFIG\";
  213.     var2  = var2 + "DECBEAR.BMP";
  214.     var3  = "Kopiere von " + var1;
  215.     var3  = var3 + " nach ";
  216.     var3  = var3 + var2;
  217.     SHOW    (INFO, var3);
  218.     COPY    (LZCOPY, var1, var2);
  219.  
  220.     var1  = SourcePath + "DECEND.BM_";
  221.     var2  = InstPath + "CONFIG\";
  222.     var2  = var2 + "DECEND.BMP";
  223.     var3  = "Kopiere von " + var1;
  224.     var3  = var3 + " nach ";
  225.     var3  = var3 + var2;
  226.     SHOW    (INFO, var3);
  227.     COPY    (LZCOPY, var1, var2);
  228.  
  229.     var1  = SourcePath + "DRUCKE.BM_";
  230.     var2  = InstPath + "CONFIG\";
  231.     var2  = var2 + "DRUCKE.BMP";
  232.     var3  = "Kopiere von " + var1;
  233.     var3  = var3 + " nach ";
  234.     var3  = var3 + var2;
  235.     SHOW    (INFO, var3);
  236.     COPY    (LZCOPY, var1, var2);
  237.  
  238.     var1  = SourcePath + "FILMAUF.BM_";
  239.     var2  = InstPath + "CONFIG\";
  240.     var2  = var2 + "FILMAUF.BMP";
  241.     var3  = "Kopiere von " + var1;
  242.     var3  = var3 + " nach ";
  243.     var3  = var3 + var2;
  244.     SHOW    (INFO, var3);
  245.     COPY    (LZCOPY, var1, var2);
  246.  
  247.     var1  = SourcePath + "FILMBEAR.BM_";
  248.     var2  = InstPath + "CONFIG\";
  249.     var2  = var2 + "FILMBEAR.BMP";
  250.     var3  = "Kopiere von " + var1;
  251.     var3  = var3 + " nach ";
  252.     var3  = var3 + var2;
  253.     SHOW    (INFO, var3);
  254.     COPY    (LZCOPY, var1, var2);
  255.  
  256.     var1  = SourcePath + "FILMEND.BM_";
  257.     var2  = InstPath + "CONFIG\";
  258.     var2  = var2 + "FILMEND.BMP";
  259.     var3  = "Kopiere von " + var1;
  260.     var3  = var3 + " nach ";
  261.     var3  = var3 + var2;
  262.     SHOW    (INFO, var3);
  263.     COPY    (LZCOPY, var1, var2);
  264.  
  265.     var1  = SourcePath + "KURZ.BM_";
  266.     var2  = InstPath + "CONFIG\";
  267.     var2  = var2 + "KURZ.BMP";
  268.     var3  = "Kopiere von " + var1;
  269.     var3  = var3 + " nach ";
  270.     var3  = var3 + var2;
  271.     SHOW    (INFO, var3);
  272.     COPY    (LZCOPY, var1, var2);
  273.  
  274.     var1  = SourcePath + "LOGO.AB_";
  275.     var2  = InstPath + "CONFIG\";
  276.     var2  = var2 + "LOGO.ABR";
  277.     var3  = "Kopiere von " + var1;
  278.     var3  = var3 + " nach ";
  279.     var3  = var3 + var2;
  280.     SHOW    (INFO, var3);
  281.     COPY    (LZCOPY, var1, var2);
  282.  
  283.     var1  = SourcePath + "OPALIS.AB_";
  284.     var2  = InstPath + "CONFIG\";
  285.     var2  = var2 + "OPALIS.ABR";
  286.     var3  = "Kopiere von " + var1;
  287.     var3  = var3 + " nach ";
  288.     var3  = var3 + var2;
  289.     SHOW    (INFO, var3);
  290.     COPY    (LZCOPY, var1, var2);
  291.  
  292.     var1  = SourcePath + "MACAUF.BM_";
  293.     var2  = InstPath + "CONFIG\";
  294.     var2  = var2 + "MACAUF.BMP";
  295.     var3  = "Kopiere von " + var1;
  296.     var3  = var3 + " nach ";
  297.     var3  = var3 + var2;
  298.     SHOW    (INFO, var3);
  299.     COPY    (LZCOPY, var1, var2);
  300.  
  301.     var1  = SourcePath + "MACBEAR.BM_";
  302.     var2  = InstPath + "CONFIG\";
  303.     var2  = var2 + "MACBEAR.BMP";
  304.     var3  = "Kopiere von " + var1;
  305.     var3  = var3 + " nach ";
  306.     var3  = var3 + var2;
  307.     SHOW    (INFO, var3);
  308.     COPY    (LZCOPY, var1, var2);
  309.  
  310.     var1  = SourcePath + "MACEND.BM_";
  311.     var2  = InstPath + "CONFIG\";
  312.     var2  = var2 + "MACEND.BMP";
  313.     var3  = "Kopiere von " + var1;
  314.     var3  = var3 + " nach ";
  315.     var3  = var3 + var2;
  316.     SHOW    (INFO, var3);
  317.     COPY    (LZCOPY, var1, var2);
  318.  
  319.     var1  = SourcePath + "MAUS.BM_";
  320.     var2  = InstPath + "CONFIG\";
  321.     var2  = var2 + "MAUS.BMP";
  322.     var3  = "Kopiere von " + var1;
  323.     var3  = var3 + " nach ";
  324.     var3  = var3 + var2;
  325.     SHOW    (INFO, var3);
  326.     COPY    (LZCOPY, var1, var2);
  327.  
  328.     var1  = SourcePath + "NUM0.BM_";
  329.     var2  = InstPath + "CONFIG\";
  330.     var2  = var2 + "NUM0.BMP";
  331.     var3  = "Kopiere von " + var1;
  332.     var3  = var3 + " nach ";
  333.     var3  = var3 + var2;
  334.     SHOW    (INFO, var3);
  335.     COPY    (LZCOPY, var1, var2);
  336.  
  337.     var1  = SourcePath + "NUM1.BM_";
  338.     var2  = InstPath + "CONFIG\";
  339.     var2  = var2 + "NUM1.BMP";
  340.     var3  = "Kopiere von " + var1;
  341.     var3  = var3 + " nach ";
  342.     var3  = var3 + var2;
  343.     SHOW    (INFO, var3);
  344.     COPY    (LZCOPY, var1, var2);
  345.  
  346.     var1  = SourcePath + "NUM19.BM_";
  347.     var2  = InstPath + "CONFIG\";
  348.     var2  = var2 + "NUM19.BMP";
  349.     var3  = "Kopiere von " + var1;
  350.     var3  = var3 + " nach ";
  351.     var3  = var3 + var2;
  352.     SHOW    (INFO, var3);
  353.     COPY    (LZCOPY, var1, var2);
  354.  
  355.     var1  = SourcePath + "NUM2.BM_";
  356.     var2  = InstPath + "CONFIG\";
  357.     var2  = var2 + "NUM2.BMP";
  358.     var3  = "Kopiere von " + var1;
  359.     var3  = var3 + " nach ";
  360.     var3  = var3 + var2;
  361.     SHOW    (INFO, var3);
  362.     COPY    (LZCOPY, var1, var2);
  363.  
  364.     var1  = SourcePath + "NUM3.BM_";
  365.     var2  = InstPath + "CONFIG\";
  366.     var2  = var2 + "NUM3.BMP";
  367.     var3  = "Kopiere von " + var1;
  368.     var3  = var3 + " nach ";
  369.     var3  = var3 + var2;
  370.     SHOW    (INFO, var3);
  371.     COPY    (LZCOPY, var1, var2);
  372.  
  373.     var1  = SourcePath + "NUM4.BM_";
  374.     var2  = InstPath + "CONFIG\";
  375.     var2  = var2 + "NUM4.BMP";
  376.     var3  = "Kopiere von " + var1;
  377.     var3  = var3 + " nach ";
  378.     var3  = var3 + var2;
  379.     SHOW    (INFO, var3);
  380.     COPY    (LZCOPY, var1, var2);
  381.  
  382.     var1  = SourcePath + "NUM5.BM_";
  383.     var2  = InstPath + "CONFIG\";
  384.     var2  = var2 + "NUM5.BMP";
  385.     var3  = "Kopiere von " + var1;
  386.     var3  = var3 + " nach ";
  387.     var3  = var3 + var2;
  388.     SHOW    (INFO, var3);
  389.     COPY    (LZCOPY, var1, var2);
  390.  
  391.     var1  = SourcePath + "NUM6.BM_";
  392.     var2  = InstPath + "CONFIG\";
  393.     var2  = var2 + "NUM6.BMP";
  394.     var3  = "Kopiere von " + var1;
  395.     var3  = var3 + " nach ";
  396.     var3  = var3 + var2;
  397.     SHOW    (INFO, var3);
  398.     COPY    (LZCOPY, var1, var2);
  399.  
  400.     var1  = SourcePath + "NUM7.BM_";
  401.     var2  = InstPath + "CONFIG\";
  402.     var2  = var2 + "NUM7.BMP";
  403.     var3  = "Kopiere von " + var1;
  404.     var3  = var3 + " nach ";
  405.     var3  = var3 + var2;
  406.     SHOW    (INFO, var3);
  407.     COPY    (LZCOPY, var1, var2);
  408.  
  409.     var1  = SourcePath + "NUM8.BM_";
  410.     var2  = InstPath + "CONFIG\";
  411.     var2  = var2 + "NUM8.BMP";
  412.     var3  = "Kopiere von " + var1;
  413.     var3  = var3 + " nach ";
  414.     var3  = var3 + var2;
  415.     SHOW    (INFO, var3);
  416.     COPY    (LZCOPY, var1, var2);
  417.  
  418.     var1  = SourcePath + "NUM9.BM_";
  419.     var2  = InstPath + "CONFIG\";
  420.     var2  = var2 + "NUM9.BMP";
  421.     var3  = "Kopiere von " + var1;
  422.     var3  = var3 + " nach ";
  423.     var3  = var3 + var2;
  424.     SHOW    (INFO, var3);
  425.     COPY    (LZCOPY, var1, var2);
  426.  
  427.     var1  = SourcePath + "NUMRAU.BM_";
  428.     var2  = InstPath + "CONFIG\";
  429.     var2  = var2 + "NUMRAU.BMP";
  430.     var3  = "Kopiere von " + var1;
  431.     var3  = var3 + " nach ";
  432.     var3  = var3 + var2;
  433.     SHOW    (INFO, var3);
  434.     COPY    (LZCOPY, var1, var2);
  435.  
  436.     var1  = SourcePath + "NUMST.BM_";
  437.     var2  = InstPath + "CONFIG\";
  438.     var2  = var2 + "NUMST.BMP";
  439.     var3  = "Kopiere von " + var1;
  440.     var3  = var3 + " nach ";
  441.     var3  = var3 + var2;
  442.     SHOW    (INFO, var3);
  443.     COPY    (LZCOPY, var1, var2);
  444.  
  445.     var1  = SourcePath + "NUMST0R.BM_";
  446.     var2  = InstPath + "CONFIG\";
  447.     var2  = var2 + "NUMST0R.BMP";
  448.     var3  = "Kopiere von " + var1;
  449.     var3  = var3 + " nach ";
  450.     var3  = var3 + var2;
  451.     SHOW    (INFO, var3);
  452.     COPY    (LZCOPY, var1, var2);
  453.  
  454.     var1  = SourcePath + "NUMST9R.BM_";
  455.     var2  = InstPath + "CONFIG\";
  456.     var2  = var2 + "NUMST9R.BMP";
  457.     var3  = "Kopiere von " + var1;
  458.     var3  = var3 + " nach ";
  459.     var3  = var3 + var2;
  460.     SHOW    (INFO, var3);
  461.     COPY    (LZCOPY, var1, var2);
  462.  
  463.     var1  = SourcePath + "NUMSTRAU.BM_";
  464.     var2  = InstPath + "CONFIG\";
  465.     var2  = var2 + "NUMSTRAU.BMP";
  466.     var3  = "Kopiere von " + var1;
  467.     var3  = var3 + " nach ";
  468.     var3  = var3 + var2;
  469.     SHOW    (INFO, var3);
  470.     COPY    (LZCOPY, var1, var2);
  471.  
  472.     var1  = SourcePath + "SHMSG.LS_";
  473.     var2  = InstPath + "CONFIG\";
  474.     var2  = var2 + "SHMSG.LST";
  475.     var3  = "Kopiere von " + var1;
  476.     var3  = var3 + " nach ";
  477.     var3  = var3 + var2;
  478.     SHOW    (INFO, var3);
  479.     COPY    (LZCOPY, var1, var2);
  480.  
  481.     var1  = SourcePath + "PROTAUF.BM_";
  482.     var2  = InstPath + "CONFIG\";
  483.     var2  = var2 + "PROTAUF.BMP";
  484.     var3  = "Kopiere von " + var1;
  485.     var3  = var3 + " nach ";
  486.     var3  = var3 + var2;
  487.     SHOW    (INFO, var3);
  488.     COPY    (LZCOPY, var1, var2);
  489.  
  490.     var1  = SourcePath + "PROTBEAR.BM_";
  491.     var2  = InstPath + "CONFIG\";
  492.     var2  = var2 + "PROTBEAR.BMP";
  493.     var3  = "Kopiere von " + var1;
  494.     var3  = var3 + " nach ";
  495.     var3  = var3 + var2;
  496.     SHOW    (INFO, var3);
  497.     COPY    (LZCOPY, var1, var2);
  498.  
  499.     var1  = SourcePath + "PROTEND.BM_";
  500.     var2  = InstPath + "CONFIG\";
  501.     var2  = var2 + "PROTEND.BMP";
  502.     var3  = "Kopiere von " + var1;
  503.     var3  = var3 + " nach ";
  504.     var3  = var3 + var2;
  505.     SHOW    (INFO, var3);
  506.     COPY    (LZCOPY, var1, var2);
  507.  
  508.     var1  = SourcePath + "MODEM.LS_";
  509.     var2  = InstPath + "CONFIG\";
  510.     var2  = var2 + "MODEM.LST";
  511.     var3  = "Kopiere von " + var1;
  512.     var3  = var3 + " nach ";
  513.     var3  = var3 + var2;
  514.     SHOW    (INFO, var3);
  515.     COPY    (LZCOPY, var1, var2);
  516.  
  517.     var1  = SourcePath + "ISDN.LS_";
  518.     var2  = InstPath + "CONFIG\";
  519.     var2  = var2 + "ISDN.LST";
  520.     var3  = "Kopiere von " + var1;
  521.     var3  = var3 + " nach ";
  522.     var3  = var3 + var2;
  523.     SHOW    (INFO, var3);
  524.     COPY    (LZCOPY, var1, var2);
  525.  
  526.     var1  = SourcePath + "DEMO.TX_";
  527.     var2  = InstPath + "CONFIG\";
  528.     var2  = var2 + "DEMO.TXT";
  529.     var3  = "Kopiere von " + var1;
  530.     var3  = var3 + " nach ";
  531.     var3  = var3 + var2;
  532.     SHOW    (INFO, var3);
  533.     COPY    (LZCOPY, var1, var2);
  534.  
  535.     var1  = SourcePath + "PROCESS.EX_";
  536.     var2  = WindowPath + "PROCESS.EXE";
  537.     var3  = "Kopiere von " + var1;
  538.     var3  = var3 + " nach ";
  539.     var3  = var3 + var2;
  540.     SHOW    (INFO, var3);
  541.     COPY    (LZCOPY, var1, var2);
  542.  
  543.     var1  = SourcePath + "WINPROC.DL_";
  544.     var2  = SystemPath + "WINPROC.DLL";
  545.     var3  = "Kopiere von " + var1;
  546.     var3  = var3 + " nach ";
  547.     var3  = var3 + var2;
  548.     SHOW    (INFO, var3);
  549.     COPY    (LZCOPY, var1, var2);
  550.  
  551.     var1    = SourcePath + "BWCC.DL_";
  552.     var2    = SystemPath + "BWCC.DLL";
  553.     Info    = "Kopiere von " + var1;
  554.     Info    = Info + " nach ";
  555.     Info    = Info + var2;
  556.     SHOW      (INFO, Info);
  557.     COPY      (LZCOPY, var1, var2);
  558.  
  559.     MAKE      (PROGMAN, "[CreateGroup(Opalis)]");
  560.     var1    = "[AddItem(" + InstPath;
  561.     var1    = var1 + "OPALDEMO.EXE";
  562.     var1    = var1 + ",Opalis)]";
  563.     MAKE      (PROGMAN, var1);
  564.  
  565.     var1  = "Die Installation wurde erfolgreich abgeschlossen.\n\nAuf der ArbeitsoberflΣche finden Sie nun eine neue Ikone mit der Bezeichnung Opalis. Opalis hat fⁿr Sie bereits einen Zugang mit der Bezeichnung BTXStandardModem, an Ihrer Schnittstelle COM2, fⁿr ein Hayes-kompatibles Modem, eingerichtet. Dabei wird davon ausgegangen, da▀ ein Modem angeschlossen ist, welches den V-23 Modus (75/1200 Baud) unterstⁿtzt. Sollte das nicht der Fall sein, so richten Sie sich bitte  vor  dem  ersten  Verbindungsaufbau  einen entsprechenden Zugang ein.";
  566.     SHOW    (MESSAGE, var1);
  567.  
  568.     var1  = "OPAL|HAUPTVERZEICHNIS|" + InstPath;
  569.     UTIL    (WRITEINI, var1);
  570.  
  571. End
  572.